object ToolsMenuItemSettingsForm: TToolsMenuItemSettingsForm Left = 193 Top = 108 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Tools menuitem settings' ClientHeight = 186 ClientWidth = 281 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poOwnerFormCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Bevel1: TBevel Left = 8 Top = 139 Width = 265 Height = 9 Shape = bsTopLine end object Label1: TLabel Left = 8 Top = 8 Width = 78 Height = 13 Caption = 'Menu item name' end object Label2: TLabel Left = 8 Top = 48 Width = 76 Height = 13 Caption = 'Application path' end object Label3: TLabel Left = 8 Top = 88 Width = 75 Height = 13 Caption = 'Command string' end object m_btnOk: TButton Left = 104 Top = 152 Width = 75 Height = 25 Caption = 'Ok' TabOrder = 0 OnClick = m_btnOkClick end object m_btnCancel: TButton Left = 192 Top = 152 Width = 75 Height = 25 Caption = 'Cancel' ModalResult = 2 TabOrder = 1 end object m_btnBrowse: TButton Left = 251 Top = 64 Width = 22 Height = 21 Caption = '...' TabOrder = 2 OnClick = m_btnBrowseClick end object m_eItemName: TEdit Left = 8 Top = 24 Width = 265 Height = 21 TabOrder = 3 end object m_eCommandString: TEdit Left = 8 Top = 104 Width = 265 Height = 21 TabOrder = 4 end object m_eAppPath: TEdit Left = 8 Top = 64 Width = 241 Height = 21 TabOrder = 5 end object smlFormLangRes: TsmlFormLangRes LangFileName = 'DefLang.ini' IgnoreEmptyString = False AutoCreateMode = True AddBracket = True StringProperties.Strings = ( 'Caption') StringsProperties.Strings = ( 'Tabs' 'Items') IgnoreControls.Strings = ( 'm_btnBrowse' 'm_eItemName' 'm_eCommandString' 'm_eAppPath' '') IgnoreFormCaption = False IncludeListViewItems = False IncludeListViewHead = False IncludeTreeViewItems = False Active = False Left = 8 Top = 152 end object OpenDialog: TOpenDialog Left = 40 Top = 152 end object smlMsgLangRes: TsmlMsgLangRes LangFileName = 'DefLang.ini' IgnoreEmptyString = True AutoCreateMode = True AddBracket = True MsgList.Strings = ( 'AppSelect=Select application' 'Applications=Applications' 'AllFiles=All files') Active = False Left = 72 Top = 152 end end